home *** CD-ROM | disk | FTP | other *** search
/ Aminet 24 / Aminet 24 (1998)(GTI - Schatztruhe)[!][Apr 1998].iso / Aminet / util / cdity / IFX.lha / IFX / VolumeBorder < prev    next >
Text File  |  1997-12-14  |  3KB  |  79 lines

  1. /* Application created by MUIBuild */
  2.  
  3. IF ~SHOW('LIBRARY', 'rexxdossupport.library') THEN
  4.    CALL ADDLIB("rexxdossupport.library", 0, -30, 0)
  5.  
  6. address Volume
  7.  
  8. FALSE = 0
  9. TRUE = 1
  10. MUIA_Application_Author = 0x80424842
  11. MUIA_Application_Copyright = 0x8042ef4d
  12. MUIA_Application_Description = 0x80421fc6
  13. MUIA_Application_OpenConfigWindow = 0x804299ba
  14. MUIA_Application_Title = 0x804281b8
  15. MUIA_Application_Version = 0x8042b33f
  16. MUIA_Background  = 0x8042545b
  17. MUIA_ControlChar = 0x8042120b
  18. MUIA_Frame = 0x8042ac64
  19. MUIA_Text_HiChar = 0x804218ff
  20. MUIA_InnerBottom = 0x8042f2c0
  21. MUIA_InnerLeft = 0x804228f8
  22. MUIA_InnerRight = 0x804297ff
  23. MUIA_InnerTop = 0x80421eb6
  24. MUIA_Menuitem_Checked = 0x8042562a
  25. MUIA_Menuitem_Checkit = 0x80425ace
  26. MUIA_Menuitem_Shortcut = 0x80422030
  27. MUIA_Menuitem_Title = 0x804218be
  28. MUIA_Slider_Level = 0x8042ae3a
  29. MUIA_Slider_Max = 0x8042d78a
  30. MUIA_Slider_Min = 0x8042e404
  31. MUIA_Window_Backdrop = 0x8042c0bb
  32. MUIA_Window_Borderless = 0x80429b79
  33. MUIA_Window_CloseGadget = 0x8042a110
  34. MUIA_Window_DepthGadget = 0x80421923
  35. MUIA_Window_DragBar = TRUE
  36. MUIA_Window_LeftEdge = 0x80426c65
  37. MUIA_Window_Open = 0x80428aa0
  38. MUIA_Window_SizeGadget = 0x8042e33d
  39. MUIA_Window_Title = 0x8042ad3d
  40. MUIA_Window_TopEdge = 0x80427c66
  41. MUIA_Window_ID = 0x804201bd
  42. MUII_TextBack = 4
  43. MUII_WindowBack = 0
  44. MUIV_Frame_None  = 0
  45. MUIV_Frame_ImageButton = 2
  46. MUIV_Frame_Text = 3
  47. MUIV_Window_LeftEdge = 408
  48. MUIV_Window_TopEdge = 4000
  49.  
  50. application ATTRS MUIA_Application_Author "Francis Labrie" MUIA_Application_Copyright "© 1997 Francis Labrie" MUIA_Application_Description "Outil de contrôle du volume sonore" MUIA_Application_Version "1.0" MUIA_Application_Title "Volume"
  51. window ID VOLUME TITLE '"Volume"' ATTRS MUIA_Window_Borderless FALSE MUIA_Window_CloseGadget FALSE MUIA_Window_DepthGadget FALSE MUIA_Window_DragBar TRUE MUIA_Window_SizeGadget FALSE
  52.  menu LABEL "Volume"
  53.   item COMMAND """window ID ABOUT ATTRS "MUIA_Window_Open TRUE"""" PORT Volume ATTRS MUIA_Menuitem_Shortcut '?' LABEL "About..."
  54.   item ATTRS MUIA_Menuitem_Title '-1'
  55.   item COMMAND """Copy FROM ENV:Volume TO ENVARC:""" PORT COMMAND ATTRS MUIA_Menuitem_Shortcut 'S' LABEL "Save"
  56.   item COMMAND """QUIT""" PORT Volume ATTRS MUIA_Menuitem_Shortcut 'Q' LABEL "Quit"
  57.  endmenu
  58.  menu LABEL "Settings"
  59.   item COMMAND """method "MUIA_Application_OpenConfigWindow"""" PORT Volume ATTRS MUIA_Menuitem_Shortcut 'M' LABEL "MUI..."
  60.  endmenu
  61.  group ATTRS MUIA_Frame MUIV_Frame_ImageButton MUIA_InnerBottom 4 MUIA_InnerLeft 12 MUIA_InnerRight 13 MUIA_InnerTop 4
  62.   knob COMMAND """SETENV Volume %s""" PORT COMMAND HELP """\033cThis knob let you adjust\nthe global volume.""" ATTRS MUIA_Slider_Min 0 MUIA_Slider_Max 64 MUIA_Slider_Level GETVAR('Volume','GLOBAL')
  63.  endgroup
  64. endwindow
  65.  
  66. window ID ABOUT COMMAND """window ID ABOUT ATTRS "MUIA_Window_Open FALSE"""" PORT Volume ATTRS MUIA_Window_Title "About..." MUIA_Window_SizeGadget FALSE
  67.  group HORIZ ATTRS MUIA_Background MUII_TextBack MUIA_Frame MUIV_Frame_Text
  68.   button PICT "Volume.info" TRANS ATTRS MUIA_Background MUII_TextBack MUIA_Frame MUIV_Frame_None
  69.   text ATTRS MUIA_Background MUII_TextBack MUIA_Frame MUIV_Frame_None LABEL "\n\033bVolume V1.0\033n\n\n© Copyrights 1997 Francis Labrie.\n"
  70.  endgroup
  71.  group HORIZ
  72.   space HORIZ
  73.   button PRESS COMMAND """window ID ABOUT ATTRS "MUIA_Window_Open FALSE"""" PORT Volume ATTRS MUIA_Text_HiChar C2D("O") MUIA_ControlChar C2D("o") LABEL "Ok"
  74.   space HORIZ
  75.  endgroup
  76. endwindow
  77.  
  78. window ID ABOUT ATTRS MUIA_Window_Open FALSE
  79.